home *** CD-ROM | disk | FTP | other *** search
/ Magnum One / Magnum One (Mid-American Digital) (Disc Manufacturing).iso / d12 / v8n19.arc / 1STCLASS.BAS < prev    next >
BASIC Source File  |  1989-10-17  |  18KB  |  229 lines
  1. 100 REM - BASIC PROGRAM TO CREATE 1STCLASS.COM
  2. 110 CLS:PRINT "Creating 1STCLASS.COM": OPEN "1STCLASS.COM" AS #1 LEN = 1
  3. 120 FIELD #1, 1 AS A$: CHECKSUM#=0
  4. 130 FOR I = 1 TO   210
  5. 140  LINESUM#=0: LOCATE 2,3: PRINT "Countdown: "   210 - I ;
  6. 150  FOR J = 1 TO  16: READ BYTE$: BYTE = VAL("&H" + BYTE$)
  7. 160   CHECKSUM# = CHECKSUM# + BYTE: LINESUM# = LINESUM# + BYTE
  8. 170   IF (BYTE < 256) THEN LSET A$=CHR$(BYTE): PUT #1
  9. 180  NEXT J
  10. 190  READ LINETOT$: LINECHECK# = VAL("&H"+LINETOT$)
  11. 200  IF LINECHECK# = LINESUM# THEN GOTO 220
  12. 210  LOCATE 4,2: PRINT "Error in line #"  ;  260 +  10 * I: GOTO 260
  13. 220 NEXT I
  14. 230 CLOSE: READ FILETOT$ : FILECHECK# = VAL(FILETOT$)
  15. 240 IF CHECKSUM# <> FILECHECK# THEN GOTO 260
  16. 250 PRINT: PRINT "1STCLASS.COM created successfully": SYSTEM
  17. 260 PRINT: PRINT "1STCLASS.COM is not valid!": END
  18. 270 DATA 33, C0, 50, FC, E8, C3,  8, 63,  A, B4, 80, CD, 14, 80, FC, E8,   8D8
  19. 280 DATA 75, 3A, B4, 3C, BA, 49,  A, 33, C9, CD, 21, A3, FE,  D, 72, 29,   6DF
  20. 290 DATA B8,  1, 3D, BA, 37,  A, CD, 21, 73,  8, B4, 3C, 33, C9, CD, 21,   634
  21. 300 DATA 72, 17, A3,  0,  E, 8B, D8, B8,  2, 42, 33, C9, 33, D2, CD, 21,   688
  22. 310 DATA BA, 2A,  A, E8, 97,  5, E9, 83,  0, E9, FD,  3, E8, 7B,  8, B6,   7E8
  23. 320 DATA  B, C3, B8,  D,  A, AB, C3, 46, E8, 94,  1, BB, 6E,  D, E8, 92,   77E
  24. 330 DATA  3, 75, 48, E8, F3,  6, BF, BD,  D, 8B, D7, AC, 3C, 20, 7E,  3,   715
  25. 340 DATA AA, EB, F8, 33, C0, AA, E8, 51,  8, C2,  C, 8B, DA, E8, 3A,  8,   8C8
  26. 350 DATA B8,  0, 3D, CD, 21, 8B, D8, 72, 1F, 53, 8B, F2, AC, 84, C0, 74,   80B
  27. 360 DATA  C, 3C, 3A, 74,  4, 3C, 5C, 75, F3, 8B, D6, EB, EF, 8B, F2, E8,   89A
  28. 370 DATA 3E,  6, B4, 3E, 5B, CD, 21, C3, E9, 9E,  3, E8, 1C,  8, 61,  C,   645
  29. 380 DATA BB, 15, 10, E8,  4,  8, C3, 56, 8B, 1E, B5,  D, 33, C0, AC,  3,   5FA
  30. 390 DATA D8, 84, C0, 75, F9, 8B, C3, A3, B5,  D, 5E, C3, B8,  0, 8D,  A,   8AD
  31. 400 DATA  6, 25,  A, 74,  2, CD, 14, 33, DB, FF, E3, FE,  6, BA,  D, E8,   72F
  32. 410 DATA D4,  4, FE,  E, BA,  D, 33, DB, C3, 57, AC, 84, C0, 74, 1F, 3C,   792
  33. 420 DATA 1A, 74, 1E, 3C, 2A, 74,  B, 3C, 2F, 74,  7, 3C, 25, 74,  3, AA,   3F9
  34. 430 DATA EB, E8, 8A, E0, B0, 25, AA, B5,  2, E8, AF,  3, EB, DC, 5E, F8,   A2A
  35. 440 DATA C3, 5E, F9, C3, BF, 95, 12, 8B, F7, E8, B7,  3, 72, 4B, 3C,  D,   86D
  36. 450 DATA 74, 23, 3C,  9, 74, 14, 3C, 20, 72, 16, 3C, 2A, 74, 12, 3C, 2F,   39F
  37. 460 DATA 74,  E, 3C, 25, 74,  A, 3C, 7E, 73,  6, AA, E8, 9E,  0, EB, D9,   688
  38. 470 DATA E8, 64,  2, EB, D4, E8, 8B,  3, 73,  7, B0,  D, E8, 58,  2, EB,   7E7
  39. 480 DATA 18, 3C,  A, 75,  B, E8, FA, FE, E8, 2B,  7, E8, 3B,  0, EB, B9,   79F
  40. 490 DATA 50, B0,  D, E8, 41,  2, 58, EB, B5, 3B, F7, 74,  9, B0, 25, AA,   75E
  41. 500 DATA E8, DF, FE, E8, 10,  7, C3, AC, AA, 84, C0, 75, FA, 4F, C3, 33,   9D5
  42. 510 DATA DB, C3, 8B,  E,  F,  E, 41, 1E, 33, C0, 8E, D8, 3B,  6, 6C,  4,   5BD
  43. 520 DATA 74, FA, A1, 6C,  4, E2, F5, 1F, C3, B4,  2, B2, 2E, CD, 21, C3,   87F
  44. 530 DATA BF, 95, 12, 57, BE, 9B,  D, B9,  5,  0, 90, F3, A4, E8, 19,  1,   70A
  45. 540 DATA E8, C4, FF, 5E, E9, 10,  5, A1,  0,  E, A3, 13,  E, FE,  6, BA,   738
  46. 550 DATA  D, E8, F2,  3, FE,  E, BA,  D, BE,  C,  D, E8, 38,  7, 33, DB,   6C9
  47. 560 DATA C3, 58, A3, BB,  D, B4,  9, CD, 21, E9, F0, FE, 81, FF, 58, 13,   8F3
  48. 570 DATA 72,  C, B0, 25, AA, E8, 6A, FE, E8, 9B,  6, E8, AB, FF, C3, 56,   981
  49. 580 DATA 8B, FE, AC, 3C, 61, 7C,  6, 3C, 7A, 7F,  2, 2C, 20, AA, 84, C0,   6C5
  50. 590 DATA 75, F0, 5E, C3, 50, E8, 51,  5, 33, C0, 8B, D8, 8B, C8, AC, 3C,   8A5
  51. 600 DATA 30, 72, 17, 3C, 39, 77, 13, 2C, 30, 98, 93,  3, C0, 8B, D0,  3,   560
  52. 610 DATA C0,  3, C0,  3, C2,  3, D8, 41, EB, E4, 93, 85, C9, 59, 75,  2,   7E4
  53. 620 DATA 8B, C1, 4E, C3, 33, C0, 8B, D8, B1,  4, AC, 2C, 30, 3C,  9, 76,   72B
  54. 630 DATA  2, 2C,  7, D3, E3,  3, D8, FE, CD, 75, EF, 8B, C3, C3, B4,  7,   8C1
  55. 640 DATA CD, 21, 84, C0, 75,  6, B4,  7, CD, 21, 32, E4, C3, E8, 56,  3,   770
  56. 650 DATA 3C,  5, 75, 29, BB, 23,  D, E8, 89,  1, 75,  C, B8, 64,  0, E8,   5C1
  57. 660 DATA 92, FF, 50, 3D, 64,  0, 74,  4, FE,  6, BA,  D, E8, 37,  3, 3C,   623
  58. 670 DATA  2, 75,  A, 33, C0, A2, BA,  D, 58, 3D, 64,  0, C3, BA, FC,  B,   65A
  59. 680 DATA E8, 3E, FF, 83, EF,  2, 33, C0, AA, 46, BB, 23,  D, E8, 53,  1,   7A3
  60. 690 DATA 75, 21, 50, 3C,  2, 75,  9, E8, AF,  4, BB, 23,  D, E8, 43,  1,   554
  61. 700 DATA E8, A6,  4, 3C, 2A, 75,  A, 46, B5,  4, E8, 77, FF, 29,  6,  D,   610
  62. 710 DATA  E, 58, C3, BA, FC,  B, E8,  8, FF, 57, BF, 23,  D, 32, C0, 84,   795
  63. 720 DATA E4, 74,  9, FE, CC, B9, FF, FF, F2, AE, EB, F3, 8B, F7, 5F, C3,   C04
  64. 730 DATA E8, E7,  5, B7,  C, 8B, DA, E8, D0,  5, B4,  1, E8, A2,  0, E8,   8E0
  65. 740 DATA D5,  3, E8, 68, FF, 75, 34, B4,  3, E8, 95,  0, E8, 53, FD, E8,   924
  66. 750 DATA 84,  5, 8B, 1E,  9,  E, E8, E4,  1, 72, 18, E8, 4B,  4, 84, C0,   61B
  67. 760 DATA 74, 11, BF, 95, 12, E8, D1, FD, E8, 37, FD, E8, 68,  5, E8, 78,   972
  68. 770 DATA FE, EB, DF, B4,  3, E8, 78, FE, E8, 32, FF, 75, 63, B4,  9, E8,   A73
  69. 780 DATA 5F,  0, B0, 20, AA, BE, 60,  D, E8, 3C, FE, E8, 14, FD, BE, 95,   872
  70. 790 DATA 12, E8, 42,  5, 8B, 1E,  9,  E, E8, A2,  1, 72, 16, 80, 3C, 21,   4F1
  71. 800 DATA 74, 11, BF, 95, 12, E8, 91, FD, E8, F7, FC, E8, 28,  5, E8, 38,   971
  72. 810 DATA FE, EB, E1, 56, B4,  9, E8, 37, FE, E8, F1, FE, 75, 22, E8, 59,   AA9
  73. 820 DATA  5, B4,  C, 5E, 80, 3C, 21, 75,  C, E8, DB, FC, 8B, 1E,  9,  E,   600
  74. 830 DATA E8, 6A,  1, 73, EF, B4,  7, E8,  7,  0, E8, 3A,  3, E8, CD, FE,   837
  75. 840 DATA C3, E8, 35, FF, BF, 95, 12, 57, 26, C6,  5, 2F, 47, E8, D7, FD,   8BF
  76. 850 DATA 33, C0, A3, B5,  D, 5E, C3, 8A, E0, B0, 25, AA, B5,  2, E8,  A,   80B
  77. 860 DATA  1, E9, 28, FE, FE,  6,  2,  E, A0,  C,  E, 84, C0, 75, 25, A2,   65E
  78. 870 DATA BA,  D, E8, F1,  1, E8, 99,  1, FE,  6, BA,  D, E8, E7,  1, FE,   8BC
  79. 880 DATA  E, BA,  D, E8, 80,  0, B4,  A, E8, B6, FF, E8, E9,  2, E8, 7C,   8CF
  80. 890 DATA FE, E9, 80,  3, E8, 6F,  0, B4,  8, E8, A5, FF, E8, D8,  2, E8,   9B3
  81. 900 DATA 6B, FE, C3, E8, 63,  3, 8B, FE, 33, C9, 8B, F7, 80, 3F,  0, 74,   8B4
  82. 910 DATA 20, AC, 3C, 20, 76, 17, 3A,  7, 9C, 43, 9D, 74, EF, 80, 3F,  0,   594
  83. 920 DATA 9C, 43, 9D, 75, F8, 41, 80, 3F,  0, 75, DF, 41, C3, 4E, 80, 3F,   74E
  84. 930 DATA  0, 8B, C1, C3, 56, 8B, FE, AC, 26, 88,  5,  A, C0, 74, 12, 3C,   6D9
  85. 940 DATA 20, 72, F4, 3C, 5E, 75,  7, AC, 3C, 5E, 74,  2, 24, 1F, AA, EB,   630
  86. 950 DATA E6, 5E, 8B, DE, 8B, CF, 2B, CB, C3, E8, 7E,  4, 84,  C, 8B, DA,   91F
  87. 960 DATA E8, 67,  4, E9, 76, FC, B4, 4E, BA, 3F,  A, CD, 21, 72, 47, B4,   80E
  88. 970 DATA 2F, CD, 21, 8B, D3, 83, C2, 1E, B8,  0, 3D, CD, 21, A3,  9,  E,   67B
  89. 980 DATA 72, 30, 52, E8, 6A, FE, 9C, B4, 3E, 8B, 1E,  9,  E, CD, 21, 9D,   71D
  90. 990 DATA 5E, 75, 1F, 56, BF, BD,  D, 57, AC, AA, 3C, 2E, 75, FA, BE, 45,   75A
  91. 1000 DATA  A, B9,  4,  0, F3, A4, B4, 41, 5A, CD, 21, B4, 56, 8B, FA, 5A,   784
  92. 1010 DATA CD, 21, B4, 4F, EB, B5, C3, F6, 3E, B1,  D,  4, 30, AA, 8A, C4,   872
  93. 1020 DATA 32, E4, F6, 3E, B2,  D,  5, 30, 30, AB, C3, 8B, D8, B1,  4, D3,   7C7
  94. 1030 DATA C3, 8B, C3, 24,  F,  4, 30, 3C, 39, 76,  2,  4,  7, AA, FE, CD,   5E5
  95. 1040 DATA 75, ED, C3, B4, 3F, 8B, 1E,  7,  E, B9,  1,  0, BA,  B,  E, CD,   630
  96. 1050 DATA 21, 72,  8, 85, C0, 74,  4, A0,  B,  E, C3, F9, C3, BE, 15, 10,   673
  97. 1060 DATA 8B, FE, B9,  1,  0, B4, 3F, 8B, D6, CD, 21, 72, 2A, 85, C0, 74,   7DA
  98. 1070 DATA 22, 80, 24, 7F, 8A,  4, 3C, 20, 72, 13, 46, 81, FE, 64, 10, 72,   55F
  99. 1080 DATA E4, 33, C0, 88,  4, 8B, CE, 8B, F7, 2B, CE, F8, C3, 3C,  D, 75,   8B0
  100. 1090 DATA D4, EB, EE, 3B, F7, 75, EA, F9, C3, E8,  9,  0, 24, 7F, 50, B4,   992
  101. 1100 DATA  E, CD, 10, 58, C3, B4, 84, A0, 25,  A, CD, 14, 75,  5, E8,  D,   65D
  102. 1110 DATA  3, EB, F2, 84, C0, 74, EE, 50, A2,  B,  E, BA,  B,  E, 8B, 1E,   70D
  103. 1120 DATA FE,  D, B4, 40, B9,  1,  0, CD, 21, 58, 32, E4,  1,  6, B5,  D,   5DE
  104. 1130 DATA C3, BF, 95, 10, 57, B8, 6C,  1, A3,  F,  E, B8, FE,  1, A3, B3,   770
  105. 1140 DATA  D, E8, C1, FF, 50, EB,  3, E8, BB, FF, AA, 3C, 2A, 75,  8, 8B,   8AD
  106. 1150 DATA 1E, B5,  D, 89, 1E,  D,  E, 3C, 25, 75, 17, 8B, F7, E8, A5, FF,   69D
  107. 1160 DATA AA, E8, A1, FF, AA, 8B, FE, 4F, 3C,  A, 74, 13, B5,  2, E8, 93,   8B3
  108. 1170 DATA FC, AA, 3C,  A, 74,  9, B8,  1,  0, 29,  6, B3,  D, 7F, C8, 33,   58B
  109. 1180 DATA C0, AA, 4F, 58, 5E, C3, E8, A8, FF, 3C, 2F, 74, 1D, E8, 50,  3,   7F8
  110. 1190 DATA F6,  6, BA,  D, FF, 74,  7, 8B, DE, E8, EE,  2, EB, E8, F6,  6,   94D
  111. 1200 DATA B8,  D, FF, 74, E1, E8, C1, FB, EB, DC, E9, B6, FC, B8,  0, 3D,   B14
  112. 1210 DATA CD, 21, A3,  5,  E, 73,  3, E9, 5F, FE, 8B, 1E,  5,  E, E8, FC,   700
  113. 1220 DATA FE, 73,  1, C3, AC, 50, 33, C0, E8,  9, FC, 8B, C8, B3, 12, F6,   91F
  114. 1230 DATA E3, A3,  F,  E, E8, 52,  1, 3C, 22, 75, 10, 46, 56, AC, 84, C0,   64D
  115. 1240 DATA 74,  8, 3C, 22, 75, F7, C6, 44, FF,  0, 5E, 58, BB, EA,  6, 53,   703
  116. 1250 DATA E8, 7C,  1, 42, 1B, 43, 41, 44, 6B, 45, 6F, 4D, 91, 50, 47, 53,   571
  117. 1260 DATA 94, 54, 74, 52, 8B,  0, 14, E8, 90,  2, 9A,  C, 58, C3, BF, 95,   6DC
  118. 1270 DATA 10, 8B, F7, E8, E3, FE, AA, 3C,  D, 75, F8, A1, 26,  A, E8, B3,   927
  119. 1280 DATA FB, 3B,  6, 26,  A, 74,  C, A3, 26,  A, 8B, D8, B4, 8C, A0, 25,   627
  120. 1290 DATA  A, CD, 14, C3, E8, BD, FD, E9, 50,  2, 88,  E, 25,  A, E8, 93,   7CB
  121. 1300 DATA FB, A3, 26,  A, 8B, D8, B4, 82, A0, 25,  A, 8B,  E, 28,  A, CD,   6CE
  122. 1310 DATA 14, B4, 83, A0, 25,  A, BB, 15,  E, B9,  0,  2, CD, 14, E8, F1,   66D
  123. 1320 DATA FA, C3, 88,  E, B9,  D, C3, E8, 8A, FD, F6,  6, B9,  D, FF, 74,   980
  124. 1330 DATA  A, 8B, D3, 8B, 1E, FE,  D, B4, 40, CD, 21, E9, D8,  1, E8, 73,   81B
  125. 1340 DATA FD, E9, 30,  2, E9, FD, FC, E9, AA,  0, BE,  8,  D, E8, 46,  2,   890
  126. 1350 DATA 33, DB, 89, 1E, 13,  E, C3, B0, 2A, AA, E8, B9,  1, BE, 95, 12,   724
  127. 1360 DATA 8B, FE, A1, B5,  D, B5,  4, E8, E1, FD, E8, 75, F9, E9, A6,  1,   A51
  128. 1370 DATA 89, 1E,  7,  E, 56, B4,  9, E8, A7, FC, B0, 20, AA, BE, 66,  D,   705
  129. 1380 DATA E8, 84, FA, B0, 3A, AA, 5E, E8, 7D, FA, E8, 55, F9, BE, 95, 12,   A52
  130. 1390 DATA E8, 83,  1, E8,  E, FA, B4,  9, E8, 95, FA, E8, BC,  1, B4,  C,   8F5
  131. 1400 DATA E9, 4A, FB, 50, 8A, 26, B7,  D, E8, AE, FB, 56, BF, 95, 14, BE,   8FF
  132. 1410 DATA A0,  D, B9,  7,  0, 90, F3, A4, 5E, E8, 4B, FA, B0, 20, AA, 58,   7F1
  133. 1420 DATA E8, 74, FD, E8, 1C, F9, 85, DB, 74,  5, 8B, F3, E8, AA, F9, E8,   B20
  134. 1430 DATA 10, F9, BE, A7,  D, B9,  A,  0, 90, F3, A4, 33, C0, 26, 88,  5,   70B
  135. 1440 DATA A3, B5,  D, BE, 95, 14, E9, 6E, FF, AC, 3C, 20, 74, FB, 3C,  9,   7DE
  136. 1450 DATA 74, F7, 4E, C3, FE,  6,  C,  E, 33, C0, A3, B5,  D, E8, 46, FE,   81E
  137. 1460 DATA A2, B7,  D, BB, 76,  D,  3, D8,  3, D8, 8B, 1F, 85, DB, 74, E8,   7C0
  138. 1470 DATA FF, D3, A1,  D,  E, 85, C0, 9C, B8, 64,  0, 74,  6, B8, 93,  1,   751
  139. 1480 DATA BB, 8C,  D, E8, 7D, FF, 9D, 74, CF, BA, 35,  C, E8, 32, FA, FC,   9A3
  140. 1490 DATA 5B, 56, 8B, F3, 8A, E0, 4E, 46, AC, 84, C0, 74,  4, 3A, C4, 75,   808
  141. 1500 DATA F6, 33, C0, AC,  3, D8, 5E, FF, E3, A1,  0,  E, A3, 13,  E, FE,   821
  142. 1510 DATA  6, B8,  D, E8, 93, FF, 84, C0, 74, 6A, BB, 60,  D, E8, 23, FC,   896
  143. 1520 DATA 75, 62, 85, C0, 74, 5E, 46, 56, E8, EF,  0, CD,  C, BE, F8,  C,   7FC
  144. 1530 DATA E8, 23,  1, 5E, E8, 1F,  1, 8B, D6, B8,  0, 43, CD, 21, 72, 13,   641
  145. 1540 DATA B4, 2C, CD, 21, 8B, C1,  3, C2, B5,  3, BF, 5F,  A, E8, BB, FC,   85E
  146. 1550 DATA BA, 56,  A, B4, 3C, 33, C9, CD, 21, 72, E5, A3, 13,  E, 8B, F2,   78C
  147. 1560 DATA BF, BD,  D, 57, E8, 60, F9, E8, 9C, FD, B4, 3E, 8B, 1E, 13,  E,   85E
  148. 1570 DATA CD, 21, A1,  0,  E, A3, 13,  E, BE,  F,  D, E8, D8,  0, 5E, E8,   641
  149. 1580 DATA D4,  0, EB,  8, E8, 93,  0, E4,  C, E8, 7A, FD, FE,  E, B8,  D,   862
  150. 1590 DATA E8, 87,  0, B4,  C, 33, DB, C3, BA, FC,  B, E8, 83, F9, 33, C0,   918
  151. 1600 DATA 3B,  6,  F,  E, 74, 16, 1E, 8E, D8, A1, 6C,  4, 1F, 3B,  6, 11,   3EE
  152. 1610 DATA  E, 74,  9, A3, 11,  E, FF,  E,  F,  E, 74, 14, B4,  1, CD, 16,   497
  153. 1620 DATA 74,  D, E8, D9, F9, 3C, 1B, 75,  6, BA, DF,  B, E8, 52, F9, C3,   8A7
  154. 1630 DATA BA, CC,  B, E8, 4B, F9, B8, 44,  4, A3,  F,  E, C6,  5,  0, 8B,   6D3
  155. 1640 DATA DE, 8B, CF, 2B, CE, B4, 86, A0, 25,  A, CD, 14, 8B, D3, 8B, 1E,   822
  156. 1650 DATA FE,  D, B4, 40, CD, 21, E8,  E, F8, B4, 87, A0, 25,  A, CD, 14,   7C6
  157. 1660 DATA 74,  5, E8, 99, FF, EB, F2, 8B, FE, C3, 53, 8A,  7, 43, 84, C0,   98D
  158. 1670 DATA 74,  6, B4,  E, CD, 10, EB, F3, 5B, C3, 5E, 50, 52, AD, 8B, D0,   81D
  159. 1680 DATA B4,  9, CD, 21, 5A, 58, FF, E6, 33, DB, B8, 64,  0, E8, 33, FE,   885
  160. 1690 DATA 58, E9, D0, FA, 8B, EB, 8B, F5, E8, 3E, FC, 8A, C8, F6,  6, B9,   B2A
  161. 1700 DATA  D, FF, 74,  7, B4, 89, A0, 25,  A, CD, 14, AC, 3A, C8, 75, E6,   77D
  162. 1710 DATA F6,  4, FF, 75, E3, C3, 8B, FE, 33, C0, B9, FF, FF, F2, AE, 4F,   B36
  163. 1720 DATA B4, 40, 8B, D6, 8B, CF, 2B, CA, 74,  A, 8B, 1E, 13,  E, 85, DB,   74C
  164. 1730 DATA 74,  2, CD, 21, C3,  0,  0,  0,  3,  0, 31, 53, 54, 43, 4C, 41,   3D2
  165. 1740 DATA 53, 53, 2E, 43, 53, 46,  0, 4D, 41, 49, 4C, 2E, 49, 4E,  0, 2A,   3C2
  166. 1750 DATA 2E, 4F, 55, 54,  0, 4D, 4C, 44,  0, 31, 53, 54, 43, 4C, 41, 53,   3FE
  167. 1760 DATA 53, 2E, 4C, 4F, 47,  0, 41, 54, 54, 41, 43, 48, 45, 44, 2E, 58,   427
  168. 1770 DATA 59, 5A,  0, 31, 73, 74, 43, 6C, 61, 73, 73, 20, 31, 2E, 30, 20,   490
  169. 1780 DATA 43, 6F, 70, 79, 52, 69, 67, 68, 74, 20, 28, 43, 29, 20, 31, 39,   4D7
  170. 1790 DATA 38, 39, 20, 5A, 69, 66, 66, 20, 44, 61, 76, 69, 73, 20, 43, 6F,   509
  171. 1800 DATA 6D, 6D, 75, 6E, 69, 63, 61, 74, 69, 6F, 6E, 73, 20, 43, 6F, 2E,   617
  172. 1810 DATA  D,  A, 50, 43, 20, 4D, 61, 67, 61, 7A, 69, 6E, 65, 20, 2A, 20,   460
  173. 1820 DATA 50, 65, 74, 65, 20, 4D, 61, 63, 6C, 65, 61, 6E, 2C, 20, 41, 75,   561
  174. 1830 DATA 67, 75, 73, 74, 20, 31, 39, 38, 39,  D,  A, 24, 4E, 4F, 54, 49,   433
  175. 1840 DATA 43, 45, 3A, 20, 54, 68, 69, 73, 20, 73, 6F, 66, 74, 77, 61, 72,   5A0
  176. 1850 DATA 65, 20, 77, 61, 73, 20, 64, 65, 76, 65, 6C, 6F, 70, 65, 64, 2C,   5D4
  177. 1860 DATA 20, 69, 6E, 20, 70, 61, 72, 74, 2C, 20, 75, 73, 69, 6E, 67, 2C,   56C
  178. 1870 DATA 20, 77, 69, 74, 68, 70, 65, 72, 6D, 69, 73, 73, 69, 6F, 6E, 2C,   651
  179. 1880 DATA 20, 70, 72, 6F, 70, 72, 69, 65, 74, 61, 72, 79, 2C, 20, 74, 72,   613
  180. 1890 DATA 61, 64, 65, 20, 73, 65, 63, 72, 65, 74, 20, 69, 6E, 66, 6F, 72,   60E
  181. 1900 DATA 6D, 61, 74, 69, 6F, 6E, 20, 6F, 66, 20, 4D, 43, 49, 54, 65, 6C,   59B
  182. 1910 DATA 65, 63, 6F, 6D, 6D, 75, 6E, 69, 63, 61, 74, 69, 6F, 6E, 73, 20,   66E
  183. 1920 DATA 43, 6F, 72, 70, 6F, 72, 61, 74, 69, 6F, 6E, 2E, 20, 20, 54, 68,   5BA
  184. 1930 DATA 65, 20, 75, 73, 65, 72, 20, 61, 67, 72, 65, 65, 73, 20, 74, 6F,   5DE
  185. 1940 DATA 20, 75, 73, 65, 20, 74, 68, 69, 73, 70, 72, 6F, 67, 72, 61, 6D,   63D
  186. 1950 DATA 20, 6F, 6E, 6C, 79, 20, 66, 6F, 72, 20, 74, 68, 65, 20, 70, 75,   5AF
  187. 1960 DATA 72, 70, 6F, 73, 65, 20, 6F, 66, 20, 63, 6F, 6D, 6D, 75, 6E, 69,   636
  188. 1970 DATA 63, 61, 74, 69, 6E, 67, 20, 77, 69, 74, 68, 20, 4D, 43, 49, 20,   56B
  189. 1980 DATA 4D, 61, 69, 6C, 2E, 24, 50, 6C, 65, 61, 73, 65, 20, 6C, 6F, 61,   58B
  190. 1990 DATA 64, 20, 43, 6F, 75, 72, 69, 65, 72, 73, 2E, 24,  7,  D,  A, 2A,   46A
  191. 2000 DATA 2A, 2A, 54, 49, 4D, 45, 44, 20, 4F, 55, 54, 2A, 2A, 2A, 24,  7,   388
  192. 2010 DATA  D,  A, 2A, 2A, 2A, 49, 6E, 74, 65, 72, 72, 75, 70, 74, 65, 64,   52B
  193. 2020 DATA 20, 62, 79, 20, 75, 73, 65, 72, 2A, 2A, 2A, 24,  7,  D,  A, 2A,   3C4
  194. 2030 DATA 2A, 2A, 50, 72, 6F, 74, 6F, 63, 6F, 6C, 20, 66, 61, 69, 6C, 75,   5D7
  195. 2040 DATA 72, 65, 3A, 20, 75, 6E, 72, 65, 63, 6F, 67, 6E, 69, 7A, 65, 64,   63E
  196. 2050 DATA 20, 6D, 65, 73, 73, 61, 67, 65, 20, 72, 65, 63, 65, 69, 76, 65,   608
  197. 2060 DATA 64, 2A, 2A, 2A, 24,  7,  D,  A, 2A, 2A, 2A, 4D, 65, 73, 73, 61,   39B
  198. 2070 DATA 67, 65, 20, 72, 65, 63, 65, 69, 76, 65, 64, 20, 77, 69, 74, 68,   60F
  199. 2080 DATA 20, 62, 61, 64, 20, 63, 68, 65, 63, 6B, 73, 75, 6D, 2A, 2A, 2A,   538
  200. 2090 DATA 24,  7, 49, 67, 6E, 6F, 72, 69, 6E, 67, 20, 75, 6E, 72, 65, 63,   5A5
  201. 2100 DATA 6F, 67, 6E, 69, 7A, 65, 64, 20, 21, 43, 4F, 4D, 4D, 41, 4E, 44,   530
  202. 2110 DATA 3A,  D,  A, 24,  7,  D,  A, 43, 61, 6E, 6E, 6F, 74, 20, 6F, 70,   3F5
  203. 2120 DATA 65, 6E, 20, 66, 69, 6C, 65, 3A, 20, 24,  7,  D,  A, 55, 6E, 6B,   45D
  204. 2130 DATA 6E, 6F, 77, 6E, 20, 73, 63, 72, 69, 70, 74, 20, 63, 6F, 6D, 6D,   643
  205. 2140 DATA 61, 6E, 64, 24,  D,  A, 24, 55, 70, 6C, 6F, 61, 64, 69, 6E, 67,   535
  206. 2150 DATA 20, 24, 41, 74, 74, 61, 63, 68, 69, 6E, 67, 20, 24, 44, 6F, 77,   545
  207. 2160 DATA 6E, 6C, 6F, 61, 64, 69, 6E, 67, 20, 61, 74, 74, 61, 63, 68, 6D,   64E
  208. 2170 DATA 65, 6E, 74, 24, 44, 6F, 77, 6E, 6C, 6F, 61, 64, 69, 6E, 67, 20,   601
  209. 2180 DATA 6D, 65, 73, 73, 61, 67, 65, 24,  D,  A, 41, 54, 54, 41, 43, 48,   4D5
  210. 2190 DATA 4D, 45, 4E, 54, 3A, 20, 20,  0,  D,  A,  D,  A,  D,  A,  0,  D,   200
  211. 2200 DATA  A, 53, 54, 4F, 52, 45, 44, 20, 4F, 4E, 20, 46, 49, 4C, 45, 3A,   412
  212. 2210 DATA 20, 20,  0, 43, 4F, 4D, 4D, 45, 4E, 54,  0, 43, 52, 45, 41, 54,   3C2
  213. 2220 DATA 45,  0, 45, 4E, 44,  0, 45, 4E, 56,  0, 49, 4E, 49, 54,  0, 52,   38B
  214. 2230 DATA 45, 50, 4C, 59,  0, 52, 45, 53, 45, 54,  0, 53, 45, 4E, 44,  0,   3E7
  215. 2240 DATA 54, 45, 52, 4D,  0, 54, 45, 58, 54,  0, 54, 55, 52, 4E,  0,  0,   3C6
  216. 2250 DATA 41, 53, 43, 49, 49,  0, 42, 49, 4E, 41, 52, 59,  0,  0, 41, 54,   3C3
  217. 2260 DATA 54, 41, 43, 48,  0,  0, DB,  1, 7F,  2,  0,  0, B7,  2,  0,  0,   336
  218. 2270 DATA  0,  0, DB,  1, BA,  7,  0,  0, B9,  8, D8,  9, 43, 68, 65, 63,   4B2
  219. 2280 DATA 6B, 73, 75, 6D, 20, 65, 72, 72, 6F, 72,  0, 2F, 45, 4E, 44, 20,   530
  220. 2290 DATA 2F, 52, 45, 50, 4C, 59, 20, 2F, 45, 4E, 44, 20, 52, 45, 50, 4C,   434
  221. 2300 DATA 59, 64,  A,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,    C7
  222. 2310 DATA  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,     0
  223. 2320 DATA  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,     0
  224. 2330 DATA  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,     0
  225. 2340 DATA  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,     0
  226. 2350 DATA  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,     0
  227. 2360 DATA  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,     0
  228. 2370 DATA 361310
  229.